A = (-1.1, 4)
B = (5.28, 3.68)
a = Segment(A, B)
b = OrthogonalLine(A, a)
D = Point(b)
c = Segment(A, D)
d = OrthogonalLine(B, a)
e = OrthogonalLine(D, c)
C = Intersect(d, e)
f = Segment(D, C)
g = Segment(C, B)
h = Segment(A, C)
i = Segment(B, D)
O = Intersect(h, i)
α = Angle(D, A, B)
β = Angle(A, B, C)
γ = Angle(B, C, D)
δ = Angle(C, D, A)
ε = Angle(B, O, A)
distanceAB = Distance(A, B)
TexteAB: Name[A] + (Name[B]) + " = " + distanceAB
distanceBD = Distance(B, C)
TexteBD: Name[B] + (Name[C]) + " = " + distanceBD
distanceDC = Distance(C, D)
TexteDC: Name[C] + (Name[D]) + " = " + distanceDC
distanceCA = Distance(D, A)
TexteCA: Name[D] + (Name[A]) + " = " + distanceCA
distanceAD = Distance(A, C)
TexteAD: Name[A] + (Name[C]) + " = " + distanceAD
distanceBC = Distance(B, D)
TexteBC: Name[B] + (Name[D]) + " = " + distanceBC